home *** CD-ROM | disk | FTP | other *** search
/ Softline PAY-CD / Softline PAY-CD(1994).iso / programm / teamwork / demo / disk1 / disk.a01 / TEXTE / SERIETW3.XLM (.txt) < prev    next >
Encoding:
Excel Spreadsheet  |  1993-09-15  |  49.5 KB  |  142 lines
  1. Sheet: 
  2. (0, 0)        * DATENBEREICH *  Twmacro, bitte Inhalt und Zeilennummern NICHT veraendern!
  3. (1, 0)        SERIETW3.XLM
  4. (1, 1)        (* Name dieser MakroVorlage, mu▀ UNBEDINGT mit dem Dateinamen dieser Vorlage ⁿbereinstimmen, da sonst dieses Fenster nicht angesprochen werden kann *)
  5. (2, 0)        CAS teamWorks     Twmacro     
  6. (2, 1)        (* Name des Makros fⁿr die Status-Ausgabe *)
  7. (3, 0)        ***
  8. (4, 0)        
  9. (4, 1)        (* Name des Autors bitte hier eintragen *)
  10. (5, 0)        AUTOKEY
  11. (5, 1)        (* Name eines eindeutigen Index in der Steuerdatei, deren Spaltenwerte alle ungleich 0 bzw. "" sind *)
  12. (6, 0)        ***
  13. (7, 0)        C:\WINDOWS\
  14. (7, 1)        (* Vollstandiger Pfad zu dem Verzeichnis, in dem die Windows-Initialisierungsdatei "WIN.INI" steht. Ist er falsch, wird dies wΣhrend der Makro-Abarbeitung gemeldet, der richtige Pfad abgefragt, der bestehende korregiert und hier wieder abgespeichert *)
  15. (8, 0)        WIN.INI
  16. (8, 1)        (* Hier mu▀ genau der String "WIN.INI" stehen*)
  17. (9, 0)        ***
  18. (10, 0)        [TWORKS]
  19. (10, 1)        (* String in der WIN.INI, der den Parameterbereich fⁿr teamWorks kennzeichnet *)
  20. (11, 0)        BerichtPfad
  21. (11, 1)        (* Name des Parameters in der WIN.INI, der das Verzeichnis zu den Berichten und der Steuerdatei angibt *)
  22. (12, 0)        BerichtNameNeu
  23. (12, 1)        (* Name des Parameters in der WIN.INI, der den Namen des neuen Berichts (ohne Pfad) angibt *)
  24. (13, 0)        BerichtVorlage
  25. (13, 1)        (* Name des Parameters in der WIN.INI, der den Namen der Vorlage (mit Pfad) angibt *)
  26. (14, 0)        BerichtDaten
  27. (14, 1)        (* Name des Parameters in der WIN.INI, der den Namen der Steuerdatei (ohne Pfad) angibt *)
  28. (15, 0)        ***
  29. (16, 0)        ***
  30. (17, 0)        ***
  31. (18, 0)        * ENDE DES DATENBEREICHS *
  32. (20, 0)        Twmacro (s)
  33. (20, 1)        (* Willkommen ... *)
  34. (23, 1)        (* DATENBEREICH einlesen *)
  35. (46, 1)        (* Prⁿfen, ob Pfad zu WIN.INI korrekt *)
  36. (47, 0)        
  37. (48, 1)        (* Wenn falscher Pfad zu WIN.INI, diesen korrigieren lassen und erneut prⁿfen *)
  38. (62, 1)        (* Makro abbrechen, wenn Pfad zu WIN.INI erneut falsch *)
  39. (71, 0)        
  40. (72, 0)        
  41. (73, 1)        (* WIN.INI ÷ffnen *)
  42. (74, 0)        
  43. (75, 1)        (* [TWORKS] suchen *)
  44. (84, 1)        (* Suchbereich markieren *)
  45. (85, 0)        
  46. (90, 0)        
  47. (103, 0)        
  48. (104, 0)        
  49. (105, 1)        (* Berichtspfad suchen und in Dir speichern *)
  50. (134, 1)        (* BerichtNameNeu suchen und in Doku speichern *)
  51. (159, 1)        (* BerichtVorlage suchen und in Vorlage speicher *)
  52. (184, 1)        (* Berichtdaten suchen und in Daten speichern *)
  53. (207, 0)        
  54. (209, 1)        (* WIN.INI schliessen *)
  55. (218, 1)        (* Makro abbrechen, wenn Steuerdatei fehlt *)
  56. (226, 1)        (* Makro abbrechen, wenn Vorlage fehlt *)
  57. (234, 1)        (* Serien-Dokument neu erzeugen und benennen *)
  58. (244, 1)        (* Layout des neuen Serien-Dokuments festlegen *)
  59. (247, 1)        (* Steuerdatei ÷ffnen ... *)
  60. (249, 1)        (* ... und Anzahl der DatensΣtze bestimmen : *)
  61. (250, 1)        (* Feld des Schlⁿssels suchen *)
  62. (273, 1)        (* Makro abbrechen, wenn Schlⁿssel nicht in der Steuerdatei vorhanden *)
  63. (283, 1)        (* Anzahl DatensΣtze bestimmen, mit Hilfe der zum Schlⁿssel geh÷renden Spalte *)
  64. (295, 1)        (* Anzahl DatensΣtze merken *)
  65. (298, 1)        (* wenn keine DatensΣtze in Steuerdatei, dann Makro abbrechen *)
  66. (310, 1)        (* Vorlage ÷ffnen *)
  67. (312, 1)        (* Pfad aus Vorlage entfernen, so da▀ nur noch der Name der Datei und somit des Fensters in Vorlage steht *)
  68. (325, 1)        (*Makro abbrechen, wenn der Name Vorlage_Start nicht in der Vorlage vorhanden ist *)
  69. (338, 1)        (*Makro abbrechen, wenn der Name Vorlage_Ende nicht in der Vorlage vorhanden ist *)
  70. (351, 1)        (* Komplette Vorlage markieren *)
  71. (352, 1)        (* LΣnge der Vorlage, d.h. Anzahl ihere Zeilen, bestimmen und merken *)
  72. (355, 1)        (* Vorlage pro Datensatz einmal in Serien-Dokument kopieren *)
  73. (369, 1)        (* Position der Unterschrift in der Vorlage bestimmen *)
  74. (391, 1)        (* Unterschrift einmal pro Datensatz in das Serien-Dokument kopieren *)
  75. (405, 1)        (* Position des Firmen-Namens  in der Vorlage bestimmen *)
  76. (412, 0)        
  77. (413, 1)        (* Position des Personen-Namens  in der Vorlage bestimmen *)
  78. (420, 0)        
  79. (421, 1)        (* Position der Stra▀e  in der Vorlage bestimmen *)
  80. (428, 0)        
  81. (429, 1)        (* Position des Ortes  in der Vorlage bestimmen *)
  82. (436, 0)        
  83. (437, 1)        (* Makro abbrechen, wenn einer der verwendeten Namen nicht in der Vorlage vorhanden ist *)
  84. (450, 1)        (* Vorlage schlie▀en *)
  85. (456, 1)        (* Bezⁿge initialisieren *)
  86. (472, 1)        (* Feldⁿberschriften in Steuerdatei durchsuchen und gegebenfalls ihre Position als Bezug merken *)
  87. (479, 0)        
  88. (483, 0)        
  89. (487, 0)        
  90. (491, 0)        
  91. (495, 0)        
  92. (499, 0)        
  93. (503, 0)        
  94. (507, 0)        
  95. (511, 0)        
  96. (515, 0)        
  97. (519, 0)        
  98. (523, 0)        
  99. (527, 0)        
  100. (531, 1)        (* END OF SOLANGE(value<>0) *)
  101. (532, 0)        
  102. (533, 0)        
  103. (534, 1)        (* Makro abbrechen, wenn nicht alle notwendigen Spalten in der Steuerdatei gefunden *)
  104. (548, 1)        (* Werte der DatensΣtze in das Serien-Dokument einfⁿgen *)
  105. (549, 0)        
  106. (551, 0)        
  107. (552, 1)        (* Positionen der Daten so veraendern, da▀ der nΣchste Datensatz gelesen werden kann und dessen Inhalt holen *)
  108. (556, 0)        
  109. (561, 0)        
  110. (566, 0)        
  111. (571, 0)        
  112. (576, 0)        
  113. (581, 0)        
  114. (586, 0)        
  115. (591, 0)        
  116. (596, 0)        
  117. (601, 0)        
  118. (606, 0)        
  119. (611, 0)        
  120. (616, 0)        
  121. (617, 0)        
  122. (618, 1)        (* Daten geeignet in das Serien-Dokument eintragen *)
  123. (619, 0)        
  124. (620, 1)        (* Ziel-Name eintragen *)
  125. (640, 1)        (* wenn kein Name vorhanden, Ziel-Firma um eine Zeile nach unten schieben *)
  126. (649, 0)        
  127. (650, 1)        (* Ziel-Firma eintragen *)
  128. (658, 0)        
  129. (659, 1)        (* Postfach oder Strasse nach Ziel-Strasse eintragen *)
  130. (668, 0)        
  131. (669, 1)        (* Zielort eintragen *)
  132. (682, 0)        
  133. (683, 0)        
  134. (684, 1)        (* Positionen der Ziel-Felder im Serien-Dokument aktualisieren, d.h. in die nΣchste Seite schieben *)
  135. (693, 0)        
  136. (699, 0)        
  137. (705, 0)        
  138. (711, 0)        
  139. (715, 1)        (* Steuerdatei schlie▀en *)
  140. (719, 1)        (* Serien-Dokument sichern *)
  141. (741, 1)        (* ... und tschⁿ▀ ! *)
  142.